home *** CD-ROM | disk | FTP | other *** search
/ Gold Medal Software 1 / Gold Medal Software Volume 1 (Gold Medal) (1994).iso / prog / tpwprog6.arj / CMSIZE.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1992-07-02  |  604 b   |  25 lines
  1. { cmsize.pas -- Determine checkmark bitmap size }
  2.  
  3. program CMSize;
  4.  
  5. uses WinCrt, WinProcs, WinTypes;
  6.  
  7. var
  8.  
  9.   N: LongInt;
  10.  
  11. begin
  12.   N := GetMenuCheckMarkDimensions;
  13.   writeln('Checkmark Dimensions');
  14.   writeln('Note: Value depends on current display mode');
  15.   writeln;
  16.   writeln('Width in pixels:  ', LOWORD(N));
  17.   writeln('Height in pixels: ', HIWORD(N))
  18. end.
  19.  
  20.  
  21. {--------------------------------------------------------------
  22.   Copyright (c) 1991 by Tom Swan. All rights reserved.
  23.   Revision 1.00    Date: 4/17/1991
  24. ---------------------------------------------------------------}
  25.